projects
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
9a8796f
)
* Have `null' and `not' explicit in LIMPLE so we inline them
author
Andrea Corallo
<akrl@sdf.org>
Fri, 4 Feb 2022 14:45:42 +0000
(15:45 +0100)
committer
Andrea Corallo
<akrl@sdf.org>
Fri, 4 Feb 2022 14:56:34 +0000
(15:56 +0100)
* lisp/emacs-lisp/comp.el (comp-limplify-lap-inst): Generate explicit
`eq' call in LIMPLE for LAP opcode 'not'.
lisp/emacs-lisp/comp.el
patch
|
blob
|
history
diff --git
a/lisp/emacs-lisp/comp.el
b/lisp/emacs-lisp/comp.el
index 9c2fc93821ef750a6f7b3a16c34f0deca57e0266..122638077cedf103c2cc046d96375b078eb16207 100644
(file)
--- a/
lisp/emacs-lisp/comp.el
+++ b/
lisp/emacs-lisp/comp.el
@@
-1832,7
+1832,9
@@
and the annotation emission."
(byte-listp auto)
(byte-eq auto)
(byte-memq auto)
- (byte-not null)
+ (byte-not
+ (comp-emit-set-call (comp-call 'eq (comp-slot-n (comp-sp))
+ (make-comp-mvar :constant nil))))
(byte-car auto)
(byte-cdr auto)
(byte-cons auto)